Apple Reference & Presen…tion Library 2 (Reseller)/Apple R&P Lib Reseller v2.0.iso/3-Demos/Third Party Demos/Networking/Timbuktu⁄Remote/Timbuktu⁄Remote™ Tour/Timbuktu_Remote™ Tour/card_11010.txt

Text File | 1989-07-19 | 6.7 KB | 317 lines

-- card: 11010 from stack: in
-- bmap block id: 2136
-- flags: 0000
-- background id: 40985
-- name: Title
----- HyperTalk script -----
-- Copyright © 1988  Farallon Computing, Inc.  All rights reserved.

on openStack
  hide menubar
  hide msg
end openStack

on mouseUp
  visual effect dissolve
  go next
end mouseUp

on closeCard
  --hide the logo dots
  lock screen
  repeat with buttonNo is 1 to 15
    hide card button buttonNo
  end repeat
  unlock screen with dissolve
end closeCard

on openCard
  global startTime
  put the seconds into startTime     --save starting time
  if the optionKey is not down then  --option key disables intro music
    --play music and animate logo dots
    set cursor to none
    play musak
    repeat with buttonNo is 1 to 15
      lock screen
      show card button buttonNo
      unlock screen with dissolve
      if the mouseClick then
        play stop
        ShowLogo
        exit repeat
      end if
    end repeat
    set cursor to hand
  else
    ShowLogo
  end if --optionKey is not down
  hide card button "Cover1"
end openCard

on ShowLogo
  --show logo dots without music and animation
  lock screen
  repeat with buttonNo is 1 to 15
    show card button buttonNo
  end repeat
  unlock screen with dissolve
end ShowLogo

on idle
  global startTime
  get the seconds
  if ((it-(startTime)) > 120) then                  --wait 2 minutes
    put "Starting self-running demo..." into msg    --then start
    click at loc of card button "Self-running"      --self-running demo
    wait 30 ticks
    send mouseUp to me
  end if
end idle


-- part 2 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=0 top=215 right=233 bottom=12
-- title width / last selected line: 0
-- icon id / first selected line: 3759 / 3759
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo1


-- part 3 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=16 top=192 right=212 bottom=36
-- title width / last selected line: 0
-- icon id / first selected line: 23528 / 23528
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo2


-- part 4 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=47 top=172 right=192 bottom=67
-- title width / last selected line: 0
-- icon id / first selected line: 23528 / 23528
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo3


-- part 5 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=85 top=171 right=191 bottom=105
-- title width / last selected line: 0
-- icon id / first selected line: 22440 / 22440
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo4


-- part 6 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=115 top=193 right=213 bottom=135
-- title width / last selected line: 0
-- icon id / first selected line: 22440 / 22440
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo5


-- part 7 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=127 top=234 right=254 bottom=147
-- title width / last selected line: 0
-- icon id / first selected line: 22440 / 22440
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo6


-- part 8 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=99 top=259 right=279 bottom=119
-- title width / last selected line: 0
-- icon id / first selected line: 22440 / 22440
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo7


-- part 9 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=66 top=261 right=281 bottom=86
-- title width / last selected line: 0
-- icon id / first selected line: 30016 / 30016
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo8


-- part 10 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=483 top=82 right=102 bottom=503
-- title width / last selected line: 0
-- icon id / first selected line: 23528 / 23528
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo9


-- part 11 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=440 top=103 right=123 bottom=460
-- title width / last selected line: 0
-- icon id / first selected line: 23528 / 23528
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo10


-- part 12 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=405 top=140 right=160 bottom=425
-- title width / last selected line: 0
-- icon id / first selected line: 3759 / 3759
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo11


-- part 13 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=394 top=180 right=200 bottom=414
-- title width / last selected line: 0
-- icon id / first selected line: 3759 / 3759
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo12


-- part 14 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=418 top=222 right=239 bottom=434
-- title width / last selected line: 0
-- icon id / first selected line: 26962 / 26962
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo13


-- part 15 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=454 top=258 right=275 bottom=470
-- title width / last selected line: 0
-- icon id / first selected line: 26962 / 26962
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo14


-- part 16 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=480 top=274 right=291 bottom=496
-- title width / last selected line: 0
-- icon id / first selected line: 31166 / 31166
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Logo15


-- part 1 (button)
-- low flags: 00
-- high flags: 2005
-- rect: left=205 top=262 right=305 bottom=348
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 2048
-- line height: 16
-- part name: Self-Running
----- HyperTalk script -----
on mouseUp
  global selfRunning
  send mouseUp to HyperCard
  if the hilite of me is true then
    put true into selfRunning
  else put false into selfRunning
end mouseUp


-- part 18 (button)
-- low flags: 00
-- high flags: 4001
-- rect: left=205 top=262 right=311 bottom=348
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Cover1